object AlarmForm: TAlarmForm Left = 334 Top = 272 BorderStyle = bsNone Caption = 'AlarmForm' ClientHeight = 227 ClientWidth = 339 Color = clWhite Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] FormStyle = fsStayOnTop OldCreateOrder = False Position = poScreenCenter Scaled = False OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 15 object Image2: TImage Left = 320 Top = 0 Width = 19 Height = 227 Align = alRight AutoSize = True Picture.Data = {} OnMouseDown = DragBarMouseDown OnMouseMove = DragBarMouseMove end object Label5: TLabel Tag = 7 Left = 16 Top = 120 Width = 305 Height = 97 AutoSize = False Color = clWhite ParentColor = False Transparent = True WordWrap = True end object Image1: TImage Left = 0 Top = 0 Width = 105 Height = 113 Picture.Data = {} end object SpeedButton1: TSpeedButton Left = 24 Top = 80 Width = 89 Height = 25 Caption = 'Yes' Flat = True Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Layout = blGlyphBottom ParentFont = False OnClick = SpeedButton1Click end object SpeedButton3: TSpeedButton Tag = 6 Left = 120 Top = 80 Width = 89 Height = 25 Caption = 'SHDN' Flat = True Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Layout = blGlyphBottom ParentFont = False OnClick = SpeedButton3Click end object SpeedButton2: TSpeedButton Tag = 1 Left = 216 Top = 80 Width = 89 Height = 25 Caption = 'No' Flat = True Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Layout = blGlyphBottom ParentFont = False OnClick = SpeedButton2Click end object Label4: TLabel Tag = 5 Left = 40 Top = 16 Width = 257 Height = 57 AutoSize = False Caption = 'Label4' Transparent = True WordWrap = True end object Label3: TLabel Tag = 4 Left = 40 Top = 16 Width = 257 Height = 57 AutoSize = False Caption = 'Label3' Transparent = True WordWrap = True end object Label2: TLabel Tag = 3 Left = 40 Top = 16 Width = 257 Height = 57 AutoSize = False Caption = 'Label2' Transparent = True WordWrap = True end object Label1: TLabel Tag = 2 Left = 40 Top = 16 Width = 257 Height = 57 AutoSize = False Caption = 'Label1' Transparent = True WordWrap = True end object Bevel1: TBevel Left = 0 Top = 104 Width = 337 Height = 10 Shape = bsBottomLine end object ProgressBar1: TProgressBar Left = 328 Top = 0 Width = 8 Height = 112 Min = 0 Max = 100 Orientation = pbVertical Position = 100 TabOrder = 0 OnMouseDown = DragBarMouseDown OnMouseMove = DragBarMouseMove end object Timer1: TTimer Enabled = False Interval = 500 OnTimer = Timer1Timer Left = 8 Top = 80 end end